home *** CD-ROM | disk | FTP | other *** search
INI File | 2003-08-04 | 1.2 KB | 72 lines |
- [tread | Read Table]
- t0 <- read.table("|", sep = "\t", header = FALSE)
-
- [func | Function]
- | <- function() {
-
- }
-
- [if | If Statement]
- if(|) {
-
- }
-
- [ifelse | If Else Statement]
- if (|) {
-
- } else {
-
- }
-
- [ifel | IfElse Function]
- ifelse(|, , )
-
- [forin | For In Statement]
- for (| in ) {
-
- }
-
- [while | While Statement]
- while(|) {
-
- }
-
- [repeat | Repeat Statement]
- repeat(|) {
-
- }
-
- [switch | Switch Function]
- switch(|, )
-
- [src | Load Source file]
- source("|")
-
- [di | Import SPSS Data]
- library(foreign); Dataset <- read.spss("|", use.value.labels=TRUE, max.value.labels=Inf, to.data.frame=TRUE)
-
- [cd | Change Working Directory]
- setwd("|")
-
- [hs | Search for Help]
- help.search("|")
-
- [ha | Apropos]
- apropos("|")
-
- [lp | Load Package]
- {.pkg <- select.list(sort(.packages(all.available = TRUE))); if(nchar(.pkg)) library(.pkg, character.only=TRUE); rm(.pkg)}
-
- [ro | Remove all Objects]
- .ans <- winDialog('yesno', 'Are you sure?'); if (.ans == 'YES') rm(list=ls(all=TRUE)) else rm(.ans)
-
- [ps | PostScript Output]
- postscript(file = "|", width = 5,
- height = 5, horizontzal = FALSE, paper = "special",
- onefile = FALSE)
-
- [pdf | PDF Output]
- pdf(file = "|", width = 5,
- height = 5, onefile = FALSE)
-
-